home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / Documents / Diagram / UW_Palettes / ColorGradations.dpalette2 / Image17 (.txt) < prev    next >
NeXT TypedStream Data  |  1995-06-12  |  624b  |  27 lines
  1. typedstream
  2. NXImage
  3. Object
  4. NXEPSImageRep
  5. NXImageRep
  6. iisssss
  7. [482c]%!PS-Adobe-2.0 EPSF-2.0
  8. %%Title: LR_Sat_Violet.eps
  9. %%Creator: Kevin Brain
  10. %%CreationDate: June 10 1992
  11. %%Pages: 0 1
  12. %%BoundingBox: 0 0 100 100
  13. %%EndComments
  14. /box { dup 0 exch lineto 1 index 1 index lineto pop 0 lineto closepath } bind def
  15. /hue {.85} bind def
  16. /topSat {1} bind def
  17. /bottomSat {0} bind def
  18. topSat bottomSat sub 100 div /inc exch def
  19. 100 -.5 translate
  20. 90 rotate
  21. 0 .5 99.5 {
  22. 0 .5 translate
  23. 0 0 moveto
  24. inc mul bottomSat add hue exch 1 sethsbcolor
  25. 100 .5 box
  26. } for
  27.